Copyright: Disk And Desk Inc.


new button
  You can add a new button to the title bar as easy as 1-2-3!


titlespy icon
This is the icon for titlespy. It is invisible at runtime.


control button
This is the system menu control button. It opens up the system menu.


title bar
You can Make the title bar a different color, make it really big, or really small! Or, have it on the left!


system menu
This is the kinds of things you can add to the system menu. How cool, hey?


about
About:

Type:

Boolean

Description:

Bring dialog box with version and registration info in design

or run time.

Sample:

TitleSpy1.About	= True


restrictions
Remarks.

You can not to have a menu in window that have TITLESPY as a child. If you use menu, it will be invisible in Run Mode.

If you make 'BorderStyle' of the Form equal to 'Fixed Double' or 'No border', TitleSpy changes it to 'Fixed Single'.


other vbx's

Other VBXs from SoftLand

TurboPack,  v 1.0

Set of following controls plus HotMap VBX.

     Introductory Price - $119.00

HotMap Custom Control, v 1.0.

HotMap VBX allows to define regions on selected bitmap and to get events with region info, when user clicks on any of selected region. When control resized, all region's sizes rescales automatically. Regions may be saved to a file and retrieved at any time.

User has a choice of a different visual acknowledgment, with a click on the defined region  (i.e. flash clicked area, invert clicked area, draw a border around clicked area, etc.).

Programmer can set any color for any defined area.

HotMap does not lose color palette resolutions when stretches 256 colors bitmaps.

Programmer can provide end user with a capability to define regions.

Price - $60.00

MCursor Custom Control,  v 2.0

MCursor VBX customizes Mouse cursor and lets you use it with any control.

Assign any icon or  any  BITMAP to the Mouse Pointer.

Use  JumpIn  feature  to jump cursor to the center of the spied control.

Set HotSpot of the cursor.

Price - $30.00

PopHelp Custom Control,  v 1.0

PopHelp VBX helps your application to have professional look. Like Excel or Microsoft Word, your program will contain PopHelp window.

ABSOLUTELY NO CODE!

Choose the text, that you want to see in the PopHelp window, then put this text in the Tag property of your control. Thats All. MouseIn, MouseOut events.

Free with any control or whith TurboPack.

Copyright 1994© SoftLand, Inc.

ALL TRADEMARKS ARE THE PROPERTIES OF THEIR RESPECTED OWNERS.

TurboPak, HotMap, TitleSpy, MCursor and PopHelp ARE REGISTERED TRADEMARKS OF SoftLand Inc.


TitleSpy Custom Control Help

Properties	Events	Methods

----------------------------------------------------------------

Description

*	TitleSpy custom control adjusts size, color, font, EVEN orientation of the Title Bar of any parent  window (form, picture box, frame, etc.). Control makes the Title Bar tiny, as it is in the VB ToolBar, or as large as you like.

*	Allows you to have Third Button on a Title Bar. Put any picture on it and respond on the Click Event.

*	Append custom items into the System Menu and receive events when users choose them.

*	Make your form  always be on top of all other windows.

Remarks

About

Other VBX's from SoftLand

Order and Technical Support


Registration

Order and Technical Support Information

TitleSpy VBX is only $40.00. When you buing it you also get FREE PopHelp VBX.

Master Card and Visa are welcome.

For place an order or for technical support contact Softland, Inc. by phones:

 (215) 741-2030

 (215) 741-5611

or send your requests by mail to:

 	SoftLand, Inc.,

610 Valley Stream Circle,

Langhorne, PA 19053

USA

or via CompuServe:

send E-Mail with request to:	75662,462

or GO SWREG and register product ID:	3277


TitleSpy custom control.

Version 5.0

Copyright 1994

SoftLand, Inc.

610 Valley Stream Circle,

Langhorne, PA, 19053

(215) 741-2030

(215) 741-5611

CompuServe ID: 75662,462


always on top
  AlwaysOnTop:

Type:

Boolean

Description:

True:

Places the parent form above all non-topmost windows.

The window maintains its topmost position even when

it is deactivated.

False:

Restore parent form state (makes it non-top-most).

Sample:

TitleSpy1.AlwaysOnTop	= True


caption left
CaptionLeft:

Type:

Boolean

Description:

True:

Makes Caption text left aligned.

False:

Makes Caption text center aligned. (Default)

Sample:

TitleSpy1.CaptionLeft	= True


color bgr active
ColorBgrActive:

Type:

Long

Description:

Sets color background of Caption Bar when parent window has a focus.

Sample:

TitleSpy1.ColorBgrActive	= &H808000


colorbgrinactive
ColorBgrInactive:

Type:

Long

Description:

Sets color background of Caption Bar when parent window has not a focus.

Sample:

TitleSpy1.ColorBgrInactive	= &H808000


colorframe
ColorFrame:

Type:

Long

Description:

Sets shadow color of Caption Bar of parent window.

Sample:

TitleSpy1.ColorBgrActive	= &H808000


colordefault
ColorDefaults:

Type:

Boolean

Description:

Sets all colors of Caption Bar of parent window to default

System colors. Works in design and run modes.

Recomended to use this property	in Form_Load event..

Note: If you don't use in form load, it will have the default system colors of your

computer, not the users.

Sample:

TitleSpy1.ColorDefaults	= True


colortextactive
ColorTextActive:

Type:

Long

Description:

Sets text color of Caption Bar when parent window has a focus.

Sample:

TitleSpy1.ColorTextActive	= &H808000


colortextinactive
ColorTextInactive:

Type:

Long

Description:

Sets text color of Caption Bar when parent window has not a focus.

Sample:

TitleSpy1.ColorTextInactive	= &H808000


letitmove
LetItMove:

Type:

Boolean

Description:

If you are using TitleSpy in other, then a Form (i.e. picture),

control, this property let you possibility to drag this control

and response to doubleclick in run time. Dragging and doubleclicking

on such control will have an effect like if this control is a

caption bar. For example doubleclicking will maximize such control

and doubleclicking again will restore it.

Sample:

TitleSpy1.LetItMove	= True


newbutton
NewButton:

Type:

Boolean

Description:

This property allows to place new button like minimize/maximize

buttons on a Caption Bar of the parent window with own event.

True:

Make New Button visible.

False:

Make New Button invisible.

Sample:

TitleSpy1.NewButton	= True


newbuttonpicture
NewButtonPicture:

Type:

Picture

Description:

This property allows to place a bitmap on new button.

Sorry, only .BMP files allowed in this version.

Sample:

TitleSpy1.NewButtonPicture	= LoadPicture("MOON.BMP")


spyallowed
SpyAllowed:

Type:

Boolean

Description:

If you don't want to spy the Caption Bar of your form, but

want to use System menu or Always-On-Top options, set this

property to false.

Sample:

TitleSpy1.SpyAllowed	= False


titleheight
TitleHeight:

Type:

Integer

Description:

Height of CaptionBar in pixels.

Sample:

TitleSpy1.TitleHeight	= 15


titleplace
TitlePlace:

Type:

Integer

Description:

Place of Caption Bar of the parent window.

0 	- Top (Normal)

1	- Left

Sample:

TitleSpy1.TitlePlace	= 1


standard properties
Standard VB properties.

But you have to remember:

If you use Non-True-Type fonts:

- Vertical oriented Caption will not have text.

- Size of font, used for Title Bar, will be nearest

  existing size for this particular font, what matches

  to current height of Title Bar.

If you use Vertical oriented Caption:

- StrikeThru and Underline don't work property for

  vertical oriented fonts.


Properties
Properties:


Events
  Events:

Sub TitleSpy1_NewButtonClick ()

'This is the place where you can put the event of what happens when your user clicks the new button on the title bar.

'If you have SpyAllowed = false, then this event won't happen.

'Sample:

      MsgBox "TitleSpy v4.0a Registered Version", 0, "TITLESPY.VBX"

Sub TitleSpy1_SysMenu (MenuItemID As Single)

'This is the sub that determines which menu item was clicked from the system control menu.This function works very similar to a combobox...

'You Add Items by adding 'TitleSpy1.AddItem "TitleSpy v4.0a", 900' To The Form_Load Event, or the event of your choice. The MenuItemID Numbers start with 900 and go to 1000...To add a seperator Bar, Type This: 'TitleSpy1.AddItem "",0' The 0 equals a seperator bar.

'To Find out which one is clicked, use the MenuItemID variable like this:

If MenuItemID = 900 Then MsgBox "Hello World", 0, "TITLESPY.VBX"

If MenuItemID = 901 Then MsgBox "Bye Bye World", 0, "TITLESPY.VBX"


Methods
Methods:

AddItem:

Syntax:

TitleSpy1.AddItem ItemStr$, ItemID

where ItemStr$	- is a String, you want to appear in System Menu

ItemID 	- is integer between 900 and 999. This ID will

  be send into SysMenu Event of TitleSpy, when

  user will selectthis Item in the System Menu.

To append a separator make ItemID equal 0.

See also SysMenu() event.

Sample:

ItemStr$ = "New Item"

TitleSpy1.AddItem ItemStr$, 900